t3008.l66:1:[TO_PR,PA_PROG] [TO_ID,'T3008']
t3008.l66:2:
t3008.l66:3:[TO_PR,PA_TYPEDEF] [TO_ID,'NEWTYPEINTINT'][TO_OP,OP_IGUAL] [TO_PR,PA_RECORD] 
t3008.l66:4:[TO_ID,'MIVAR'][TO_OP,OP_2PTO] [TO_ID,'INTEGER'][TO_OP,OP_PTVG] 
t3008.l66:5:[TO_ID,'MBVAR'][TO_OP,OP_2PTO] [TO_ID,'BOOL']
t3008.l66:6:[TO_PR,PA_END] [TO_PR,PA_RECORD] [TO_OP,OP_PTVG] 
t3008.l66:7:[TO_ID,'NEWTYPEINT'][TO_OP,OP_IGUAL] [TO_PR,PA_ARRAY] [TO_OP,OP_ABR_PAR] [TO_ID,'NEWTYPEINTINT'][TO_OP,OP_FCH_PAR] [TO_OP,OP_ABR_COLC] [TO_IN,1] [TO_OP,OP_PTOPTO] [TO_IN,3] [TO_OP,OP_FCH_COLC] [TO_OP,OP_PTVG] 
t3008.l66:8:[TO_ID,'NEWTYPEEXT'][TO_OP,OP_IGUAL] [TO_PR,PA_RECORD] 
t3008.l66:9:[TO_ID,'MNTIIVAR'][TO_OP,OP_2PTO] [TO_ID,'NEWTYPEINTINT'][TO_OP,OP_PTVG] 
t3008.l66:10:[TO_ID,'MNTIVAR'][TO_OP,OP_2PTO] [TO_ID,'NEWTYPEINT']
t3008.l66:11:[TO_PR,PA_END] [TO_PR,PA_RECORD] [TO_OP,OP_PTVG] 
t3008.l66:12:[TO_PR,PA_VARS] 
t3008.l66:13:[TO_ID,'NTEXTVAR'][TO_OP,OP_2PTO] [TO_ID,'NEWTYPEEXT'][TO_OP,OP_PTVG] 
t3008.l66:14:
t3008.l66:15:[TO_PR,PA_BEGIN] 
t3008.l66:16:[TO_ID,'NTEXTVAR'][TO_OP,OP_PTO] [TO_ID,'MNTIIVAR'][TO_OP,OP_PTO] [TO_ID,'MIVAR'][TO_OP,OP_ATRIB]  [TO_IN,1] [TO_OP,OP_PTVG] 
t3008.l66:17:[TO_ID,'NTEXTVAR'][TO_OP,OP_PTO] [TO_ID,'MNTIVAR'][TO_OP,OP_ABR_COLC] [TO_IN,1] [TO_OP,OP_FCH_COLC] [TO_OP,OP_PTO] [TO_ID,'MIVAR'][TO_OP,OP_ATRIB]  [TO_IN,5] [TO_OP,OP_PTVG] 
t3008.l66:18:[TO_PR,PA_END] [TO_OP,OP_PTO] 
t3008.l66:19:
t3008.l66:20:
t3008.l66:21:[TO_EO]